-- background: 2568 from stack: in. Lab -- bmap block id: 3243 -- flags: 0000 -- background id: 0 -- name: ----- HyperTalk script ----- on dim global tb put empty into card field tb end dim on dimmer1 put 1 into zz repeat until zz = 6 set the highlight of BG button zz to false put zz + 1 into zz end repeat end dimmer1 on dimmer2 global tb hide card field id 40 put 1 into zz repeat until zz = 6 set the highlight of cd button zz to false put zz + 1 into zz end repeat if tb = empty then exit dimmer2 set the highlight of card button tb to true end dimmer2 on dimmer3 global tb put 1 into zz repeat until zz = 6 set the highlight of cd button zz to false put zz + 1 into zz end repeat end dimmer3 on dimmer4 global count1,count2 repeat until count1 = count2 put empty into card field id count1 put count1 + 1 into count1 end repeat put empty into count1 put empty into count2 end dimmer4 -- part 1 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=10 top=40 right=93 bottom=62 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: A ----- HyperTalk script ----- on mouseUp Global bottle global bt put empty into field result dimmer1 set the highlight of BG button 1 to true put "A" into bottle put 1 into bt end mouseUp -- part 2 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=77 top=41 right=94 bottom=130 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: A ----- HyperTalk script ----- on mouseUp Global bottle global bt put empty into field result dimmer1 set the highlight of bg button 2 to true put "B" into bottle put 2 into bt end mouseUp -- part 3 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=140 top=41 right=94 bottom=193 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: A ----- HyperTalk script ----- on mouseUp Global bottle global bt put empty into field result dimmer1 set the highlight of bg button 3 to true put "C" into bottle put 3 into bt end mouseUp -- part 4 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=202 top=41 right=94 bottom=254 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: A ----- HyperTalk script ----- on mouseUp Global bottle global bt put empty into field result dimmer1 set the highlight of bg button 4 to true put "D" into bottle put 4 into bt end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=263 top=41 right=94 bottom=314 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: A ----- HyperTalk script ----- on mouseUp Global bottle global bt put empty into field result dimmer1 set the highlight of bg button 5 to true put "E" into bottle put 5 into bt end mouseUp -- part 7 (field) -- low flags: 81 -- high flags: 0004 -- rect: left=6 top=239 right=306 bottom=508 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 3 -- text size: 18 -- style flags: 256 -- line height: 20 -- part name: Result -- part 8 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=333 top=102 right=135 bottom=497 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Starter -- part 9 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=334 top=173 right=314 bottom=487 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Starter2